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Mailing AAL 


Let's review how AAL is mailed, when you should expect to 
receive it, and what to do about it when you don't. Most of 
you get your newletter by Bulk Mail, which is a little erratic. 
You should receive your issue around the third week of each 
month, but don't start worrying until the end of the month. If 
you haven't received an issue by the end of the month, call or 
write and we'll send a replacement. The Post Office does not 
forward Bulk Mail, so make certain to tell us if you move. 
Those of you who have First Class Mail subscriptions should 
receive your issue around the tenth of the month, ana certainly 
before the twentieth. 


The number in the upper right corner of your mailing label is 
the expiration date of your subscription. If that number is 
8308, you're holding your last issue and better renew now. We 
send out postcards when your subscription is about to expire, 
and when it has expired. All you have to do is send us a 
check, or phone with a charge card number, and we'll keep your 
AAL coming. 


Using Auxiliary Memory in the //e............e-David C. Johnson 
Ridgefield, CT 


When I bought my Apple //e (3 days after they became 
available!), I also got the Extended 80-Column Text Card. I 
wanted it both to have 80 column text capability and a full 
complement of Apple Computer Inc. supported memory. However, 
Apple only supplied two small subroutines in ROM and incomplete 
(but otherwise excellent) documentation in their manuals, in 
“support” of the auxiliary memory. 


I say “incomplete” because two I/O locations that I used in my 
program are not mentioned (in English anyway) anywhere in the 
Manuals except in the listings of the 80-column firmware. The 
two I/O locations are $C01l1 & $C012 which I call READ.BSR.BANK 
& READ.BSR.RAM.READ. Apple evidently intenas to let software 
developers determine how the auxiliary memory is to be used. 


Well here goes: my program is called “USE.AUXMEM"”". This 
program allows you to access the "other" 64K in a manner most 
Apple users should already be familiar with: monitor commands. 


The simplest way to see what I mean is to type in & assemble 
the program (not so simple), type :"MGO G"“, :"PR#3" and then 
:"S°Y" (that is control-Y). You will get a bell and the 
monitor's prompt. Any monitor commands you type now will “use” 
the auxiliary memory. Try these now: 


*3D0:55 
*3D0 (double nickels, right?) 
*°y (back to SCASM!) 


:$3D0 (a $4C!) 


You should note that control-Y while uSing the auxiliary memory 
returns to main memory with everything as it was. Now try 
these: 


:S°Y 3D0 
*3D0 “Y 


After the second control-Y returned to main memory, SCASM 
finished the first command line! 


The reason I had you type :"PR#3" before is quite simple: 
things don't all work right without the 80 column firmware 
active; specifically, right-arrow & escape functions. You can 
also type "escape 4" if you don't want 80 columns. 


But wait a minute, if you read the 80-column firmware listing 
(carefully), you know that it does NOT work with the auxiliary 
memory enabled (as doesn't the regular 40-column firmware), so 
how is this all working? Well, the I/O hooks in the auxiliary 
memory zero page point to routines in USE.AUXMEM which switch 
to main memory, perform the I/0, switch back to auxiliary 
memory, and return to the monitor. The monitor executes its 
commands between I/O calls while auxiliary memory is enabled. 
These switchings also change the bank switched memory state. 
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S-C Macro Assembler (the best there iS!) ...ccvccccccccccccccccccc se 980.00 
S-C Macro Assembler Version 1.1] Update... ..ccccccccccccvcccscscccsce lide 50 


S-C Cross Reference DELIDLEY o5s66'4:6 oie 0 i-8b 4 ook WE Se wee ES Meese oe20<00 
S-C Cross Reference Utility with Complete Source Code.........022e-950.00 


S-C Word PYOCES SOL cs6 seo de sew. he ee SEE We ESOS Ew DOW OOS wwe OO 00 
As is, with fully commented source code. Needs S-C Macro Assembler. 
Applesoft Source Code On Disk... .cccccccccccvvccccscccssvcccccsseees oI0600 

Very heavily commented. Requires Applesoft and S-C Assembler. 
ES-CAPE: Extended S-C Applesoft Program EGit OF 6 6.5-6-¢ 0 64.0s 0d 6 ew 08% 900600 


AAL Quarterly DSK Sedo osatee 6 owes eee Sia wees OS Wwe OOS eed Sew ee eacn $15.00 
Each disk contains all the source code from three issues of “Apple 


Assembly Line”, to save you lots of typing and testing time. 


QD#l: Oct-Dec 1980 QD#2: Jan-Mar 198] QD#3: Apr-Jun 1981 
QD#4: Jul-Sep 1981 QD#5: Oct-Dec 1981 QD#6: Jan-Mar 1982 
QD#7: Apr-Jun 1982 QD#8: Jul-Sep 1982 QD#9: Oct-Dec 1982 
QD#10: Jan-Mar 1983 QD#11: Apr-Jun 1983 


Double Precision Floating Point for AppleSoOft.....ccvccccccvccsesee$D0.00 
Provides 2l-digit precision for Applesoft programs. 
Includes sample Applesoft subroutines for standard math functions. 


FLASH! Integer BASIC Compiler (Laumer ResSearch)....cccccccccsecvcseee $79.00 
Full Screen Editor for S-C Macro Assembler (Laumer Research).......$49.00 
The Visible Computer: 6502 (Software Masters).......(reg. $50.00) $45.00 
Super Disk Copy III (Sensible Software).........++.-(reg. $30.00) $27.00 
Amper-Magic (Anthro-Digital) ...cwccccccccccsvveccsee (Leg. $75.00) $67.50 
Amper-Magic Volume 2 (Anthro-Digital).......eeceeeee-(reg. $35.00) $30.00 
Quick-Trace (Anthro-Digital) ...cccncccccvcccscecoseoe (LEG. $50.00) $45.00 


DISASM Dis-Assembler (RAK War ©.) s.dc5 ses 302s Wo ee B66 4 Sn hs wE Se eres & S000 


Blank Diskettes (with hub rings).......eeeeeeceeee package of 20 for $45.00 
Small 3-ring binder with 10 vinyl disk pages and disSkS........+.++-$36.00 
Vinyl disk pages, 6"x8.5", hold one disk each......ccceevceeee-l10 for $6.00 
Diskette Mailing ProtectoOrS.....crceccccevesscccseeeel0-99: 40 cents each 

100 or more: 25 cents each 
2IF Game. Socket. EXE GNGEDr 66.66 ici hi.6 bw 06 660 O STRUCK OSSD Oe eee ee aw eee e204 00 
Shift-Key MOG1f 16 ride ois ss eis eeu e us 6 bine Sleek Ws WS Oe was Se TS Se LO O0 
Lower~-Case Display Encoder ROM... .ccccccccccccccsccscccccvscscccces Sse 00 

Only Revision level 7 or later Apples. 


Add $1.50 per book for US postage. 


WICO ‘Track: Bal les s66:é's 60 4.0 Ws ewss oN eee ea cee bes oe ase ons. ( 989595) $80.00 
STB-80 80-column Display Board (STB Systems).......2.-+($249.00) $225.00 
STB-128 128K RAM Card (STB Systems) ....c.cccccccsccsceee (9399.00) $350.00 
Grappler+ Printer Interface (Orange Micro).....eeeee+eee($175.00) $150.00 
Bufferboard 16K Buffer for Grappler (Orange Micro).....($175.00) $150.00 
Buffered Grappler+ NEW!! Interface and 16K Buffer.....($239.00) $200.00 
Books, BOOKS, BOOKS. ..ccrcccccvvcccevcvesseesecompare our discount prices! 
“THE Book of Apple Software 1983 (with supplement)...($24.90) $18.00 
“The Apple ][({ Circuit Description", Gayler...........($22.95) $21.00 
“Enhancing Your Apple II, vol. 1", Lancaster.........($17.95) $17.00 
"Incredible Secret Money Machine", Lancaster.......ee- ($7.95) $7.50 
“Micro Cookbook, vol. 1", LancaSter.....cccsccccveeee ($15.95) $15.00 
"Beneath Apple DOS", Worth & Lechner.....cccccccecees ($19.95) $18.00 
"Bag of Tricks", Worth & Lechner, with diskette......($39.95) $36.00 
“Apple Graphics & Arcade Game Design", Stanton.......($19.95) $18.00 
"Assembly Lines: The Book", Roger Wagner....cceceesee ($19.95) $18.00 
“What's Where in the Apple", Second Edition........-.($24.95) $23.00 
“What's Where Guide® (updates first edition).....ece- ($9.95) $9.00 
"6502 Assembly Languace Programming“, Leventhal......($18.95) $16.00 
"6502 Subroutines", Leventhal... cccccccccccccecccsees (917.95) $17.00 


**x* S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 *** 
saa (214) 324-2050 ae 
*** We take Master Charge, VISA and American Express *** 


Foreign orders aad postage needed. 


Whatever Else You NGC O66 6 ao 8S wa OOS MS SOs Se Cale for Our Low Prices 
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The USE.AUXMEM program has two other control-Y commanas. They 
implement the crossbank subroutines AUXMOVE & XFER (supplied in 
ROM) as monitor commands. See the comments at the top of the 
source listing for their syntax. 


About Some //e Monitor Bugs... 


One routine, USE.AUXMEM.CONTROL.Y.HANDLER, deServes a special 
note. It compensates for a bug in the Apple //e version of the 
monitor: when parsing a control-Y commana the ASCII string 
“Bryan” at SFEC5 is executed as instructions prior to JMPing to 
USRADR (S$03F8). This bug has a long history. 


In the original Apple monitor the CHRSRCH loop (S$FF78 - SFF81) 
scans the CHRTBL (S$FFCC - SFFE2) from ena to beginning, which 
matches the $B2 at SFFCD causing TOSUB (SFFBE - SFFCB) to load 
the $C9 at SFFE4 and RTS to USR (SFECA) which is a JMP USRADR 
(SO3F8). 


Things started to go astray when the autostart ROM was created, 
and the Apple II Plus. To make room for new features, (like 
printing “APPLE ][“ at the top of the screen on power up, and 
like the escape-IJKM cursor motion), the TRACE ana STEP 
commands were removed. To disable the entries for Trace and 
Step in CHRTBL, the bytes for “T" and “S" were changed: 
(SFFCF:B2 & SFFD2:B2, also S$FFE9:C4). Locations -$FEC5 - SFEC9, 
immediately prior to USR, were changed to NOPs. 


Unfortunately, someone forgot that CHRTBL is searched from end 
to beginning, cauSing a control-Y command to be matched with 
the $B2 at SFFD2, corresponding to the branch address in SUBTBL 
at SFFE9. So when you type a control-Y command the monitor 
branches to SFFC5 and executes the 5 NOPs. If SFFE9 had been 
changed to $C9 instead of $C4, everything would have still been 
fine. 


Executing 5 NOPs is not a bad bug. But when the Apple //e 
monitor was created those 5 NOPS were replaced by the string 
“Bryan*. In hex it is C2 F2 F9 El EE. The 6502 instruction 
set does not include a definition for $C2, but after a little 
investigation, or after reading Bob Sander-Cederlof's article 
in AAL March 1981, you find out that $C2 acts like a two-byte 
NOP. The "r" is skipped over. The "yan", however, is a 

SBC SEEE1,Y instruction. 


The USE.AUXMEM.CONTROL.Y.HANDLER uses the passed contents of 
the A & X registers to decide which of the three control-Y 
commands you've typed. The SBC SEEE1,Y changes the A register 
so its contents must be reconstructed. The reconstruction is 
further complicated by the fact that the monitor leaves the 
carry flag set when it RTS's to SFEC5, while the S-C Assembler 
and Mini-Assembler leave the carry flag clear. 


To restore the A register to itsS proper value you must set the 


carry to the complement of the value that it was set to prior 
to the SBC SEEE],Y then execute ADC SEEEI1,Y. 
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The Apple //e 80 column firmware also contains a bug. Because 
of the $11 at $C92A, the key sequence "ESCape “L" causes a RTS 
to S4CCE. Location $C92A should contain a $10. This bug can 
be used to advantage if you feel like adding a secret commana 
to your own software. Just be certain you have the code tor 
your command starting at S4CCE, and that you are running in 
80-column mode. Then whenever you type control-L in the escape 
mode (cursor iS an inverse plus) your code will be executed, 


I hope all of you enjoy using your auxiliary memory as much as 
I do. 


Last Minute Note: David just called to report yet another 
oddity in the //e ROMS. In 40-column ESCape mode the (, 5, *, 
and + keys duplicate the arrow keys. That is, “ESC 5" moves 
the cursor right one space, just like ESC right arrow. This is 
a little bit weird, but it doesn't seem to hurt anything. The 
Roce. is caused by an unnecessary AND #SDF instruction at 
C26E. 


aap SAVE JOHNSON'S USE AUXMEM 
meee # SWITCH.MIND Command: Y 
1080 # When in main bank, enters monitor in 
1050 * auxmem BSR (hooks I/O through main 
1060 * and brings USE.AUXMEM to auxmem too) 
1eke & When in aux bank, returns to main bank 
aceD : Best used w/80 column firmware active 
en USE.AUXMOVE Command: DEST<SOURCE.END Y{CARRY} 
1120 # DEST = Destination in one bank 
aie * SOURCE = Start in other bank 
1140 # END = End in other bank 
1150 & CARRY = Direction of move 
1160 # 1 = Main Ram-->Card Ram 
aye # O = Card Ram-->Main Ram 
eG : DEST, SOURCE, & END must be: >=$0200 & <=$BFFF 
Mece ; USE.XFER Command: ADDRESS” Y{CARRY} {OVERFLOW} 
1220 # ADDRESS = Transfer address 
1eae # CARRY = Desired 48K Bank ($0200 - $BFFF) 
1240 # 1 = Use 48K in Card Ram 
1250 & O = Use 48K in Main Ram 
1260 OVERFLOW = Desired ZP/STK/BSR 
ieie % 1 = Use ZP/STK/BSR in Card i} 
1280 # QO = Use ZP/STK/BSR in Main Ram). 
1290 ® If using USE.XFER from auxmem, routine in main mem 
LE : MUST LDX BANK.SP.SAVE, TXS if it uses the stack at all 
0028- 1326 MON .BASL -EQ $28, $29 
0034- 1 Be MON .YSAV EQ 
0036- 1340 MON.CSWL EQ $36, $37 
0038- 1350 MON.KSWL -EQ $38,$39 
003C- 1360 MON.A1 -EQ $3C,$3D $Source,Address 
003E- 1370 MON .A2 -EQ $3E,$3F 
0042- 1380 MON.A4 EQ 2,943 Dest 
004 8—- 1390 MON «STATUS ~ EQ 
0200- 1410 IN -EQ $0200 - $02FF 
03CC- 1420 BANK.X.SAVE EQ $03CC 
03CD- ane BANK.BSR.BANK.SAVE ~-EQ $03CD 
03CE- 1440 BANK.BSR. RAM. READ.SAVE -EQ $03CE 
03CF- 1450 BANK.SP.SAVE ~EQ $03CF 
03ED- 1460 TRANSFER -EQ $03ED, $03EE 
03F0- 170 MON .BRKV -EQ $03F0,$03F1 
03F8- 1480 USRADR -EQ $03F8 - $03FA 
03FB- 1490 NMI -EQ $03FB - $03FD 
O3FE- 1500 MON.IRQLOC -EQ $03FE,$03FF 
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(610) @2eecut ete te sce e tee eos 
C002- 1520 READ .MAIN.RAM -EQ $C002 
C003- ‘2p READ. AUX. RAM -EQ $C00 
CO04- 1540 WRITE.MAIN. RAM ~EQ $C00 
C005- 1550 WRITE.AUX.RAM -EQ $C00 
CO06- 1560 USE.MAIN.ZP.STK.BSR -EQ $C00 
C009- ike USE .AUX.ZP.STK.BSR ~EQ $C009 
CO11- 1580 READ.BSR.BANK -EQ $C011 
C013- 1600 READ.RAM. READ.STATUS ~-EQ $C01 
CO14—- 1610 READ. RAM.WRITE.STATUS -EQ $C01 
C016- 1620 READ.ZP.STK.BSR.STATUS -EQ $C016 
Co80- 108 BSR.2. RAM. READ.ONLY -EQ $C080 
CO81- 1640 BSR.2.ROM.READ.RAM.WRITE .EQ $C081 
C082- 1650 BSR.2.ROM.READ.ONLY -EQ $C082 
C083- 1660 BSR.2.RAM.READ.RAM.WRITE .EQ $C08 
CO88- ie BSR. 1.RAM. READ .ONLY -EQ $C08 
C089- 1680 BSR.1.ROM.READ.RAM.WRITE .EQ $C089 
CO8A- 1690 BSR.1.ROM.READ.ONLY -EQ $CO8A 
CO8B- 0 BSR.1.RAM.READ.RAM.WRITE EQ CO8B 
C311- 1720 AUXMOVE ~-EQ $C311 
C314- HE XFER -EQ $C314 
FSO00- 1740 MONITOR -EQ $FS00 - $FFFF 
FA59- 1750 MON .OLDBRK -EQ $FA59 
FRDD- 1760 BEEP -EQ $FBDD 
FDIC= LB MON . RDKEY -EQ $FDOC 
FD&B- 1780 MON .JSR.CLREOL -EQ $FD8B - $FD8D 
FDED- 1790 MON .COUT ~EQ $FDED 
FF65- } a0 MON -EQ $FF65 

1820 -OR $0803 

yi . aa ees 
0803- 4C 12 08 1850 JMP CONNECT.CONTROL.Y 

1860 JMP.TO. ser TO.MAIN 
0806- 4C 25 09 1870 MP RETURN.TO.MAIN 

1880 JMP.TO. RETURN, TO.AUX 
0809- 4C 19 09 1890 JMP RETURN.TO.AUX 


1900 JMP.TO.SAVE.BSR.STATE 


O80C- HC 61 09 1910 JMP SAVE.BSR.STATE 
1920 JMP.TO.RESTORE.BSR.STATE 
O80F- 4C 32 09 I3ae é JMP RESTORE.BSR.STATE 
1950 CONNECT.CONTROL.Y 
0812=- 42 08 1280 LDA /USE. oo CONTROL. Y.HANDLER 
0814- 8D FA 03 1 i? STA USRADR+2 
0817- AQ 22 1980 LDA #USE.AUXMEM.CONTROL.Y.HANDLER 
0819- 8D F9 03 1390 STA USRADR+1 
081C- AQ 4 2000 LDA #3 iC P 
O81E- 8D F8 03 2010 STA USRADR 
0821- 60 2020 RTS 
2030 Swen nnn nnn en enn eee ee 
2040 USE.AUXMEM.CONTROL.Y. HANDLER 
2050 * Reconstruct monitor mode byte 
2060 * after "Bryan"™ messed with it 
2070 * (*"Br® is NOPish) 
0822= 48 2080 PHA 
0823- AD 00 02 2090 LDA IN 
0826- C9 AY 2100 CMP #"$" 
2110 * Branch w/Carry set causa S-C or Mini-Asm 
0828- FO 01 2120 BEQ .1 
O82A- 18 2130 CLC 
O82B- 68 2140 .1 PLA 
2150 # These lines are for you Bryan 
082C- 79 2160 -DA #' 
O82D- E1 EE 2170 ~AS ene Builds SBC $EEE1,Y 
2180 ® Check for user specified address 
O82F- EO 01 2190 CPX #$01 
0831- DO 57 2200 BNE SWITCH.MIND 
0833- A8& 2210 TAY 
2220 ® Lesser Gon ang ae USE .XFER 
0834=- FO 12 2230 E.XFER 


2240 *® Most ee fe USE . AUXMOVE 
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GOT A FUNNY DISK? 
..» WANT TO KNOW MORE ABOUT IT? 


Then you 


need the 


a 


(Confidential 
Information 
Advisors) 


CAN YOU... 
* edit normal or protected disks? 


x quickly find and recover any intact file, however badly the disk is corrupted? 
x list programs directly from any disk - protected or not? 

* examine textfiles directly from any disk - protected or not? 

* analyse the formatting of normal or protected disks? 

x decrypt commercial software - or encrypt your own? 

x rapidly auto-search normal or protected disks for anything you like? 

x understand & use the latest copy protection methods? 

* use your Apple as a powerful document retrieval system? 

x make use of an exhaustive knowledge of disk lore? 


YOU CAN NOW — with a little help from these 5 sophisticated disk utilities: 


TRICKY DICK examines. records. deletes, and edits. It can: (1) 
read individual sectors from normal and most protected disks, 
(2) list their contents in BASIC, assembler, ASCII, or hex, (3) 
edit them. (4) write them back to the disk. Tricky Dick 
cunningly bypasses most protection systems, allowing you to 
work on disks with nonstandard formatting, half-tracks, and 
altered DOS marks. It is also a chief executive program that 
directs the following undercover agents: 


THE LINGUIST reads inatrackful of raw data for your scrutiny, 
translates all the address information, and allows you to inspect 
the track's formatting. It also translates all 3 types of DOS 
encoding (6&2,5 &3,4 & 4), and works with Tricky Dick to list 
and examine programs or textfiles on any protected disk. You 
can use The Linguist to recover valuable files from blown disks, 
improve your programming skills by studying commercial 
software, and analyse standard or altered formatting. 


THE TRACER rapidly searches normal and most protected 
disks for up to Six strings of your choice simultaneously 
(specified in ASCII or hex). The Tracer also verifies disk 
formatting, and sniffs out all hidden catalog or VTOC sectors. 
When it finds something. it transfers control to Tricky Dick and 
puts the cursor over the object of your search. A few further 
keystrokes allow you to make any necessary changes and write 
the sector back to the disk. 


THE CODE BREAKER keeps your programs and textfiles from 
prying eyes by enabling you to translate them into a “secret 
code’ during disk storage. This utility also deciphers encrypted 


Send $65.00 Money Order to: 
(Checks allow time to clear) 


TO GET THE CIA ON THE TRAIL OF YOUR DISKS, SEND $65.00 TO: 


commercial programs. allowing you to use Tricky Dick to read. 
list, and edit software never before accessible to any disk utility. 


THE TRACKER closely shadows the disk drive arm, carefully 
recording all its movements and operations. The Tracker's job 
is to display, on either your screen or printer, alist of every track 
and sector accessed during a LOAD. RUN. SAVE. or any other 
DOS operation. This utility also tells you exactly where a read 
or write occurred during any disk access. Use The Tracker’s 
services to locate the precise trouble spots on a clobbered disk. 
to determine sector skew patterns, to discover the location of 
hidden “nibble-count” tracks on protected disks, and to learn 
much more about how DOS works. You'll be surprised to see 
just exactly where the disk arm really does go! 


What's more. you get permanent access fo: 


THE CIA FILES, a 50.000+ word book designed to turn you into 
a disk expert. In addition to complete instructions for the 5 CIA 
utilities, the book contains an easy-to-follow hand-hoiding 
tutorial (written in plain English!) on all aspects of the Apple 
disk. Using the CIA utilities as your personal guides, you 
progress step-by-step to total disk mastery. You'll acquire a 
wealth of skills and information relating to disk repair and file 
recovery, DOS patches, copy protection, disk formatting, 
program encryption, and other vital topics. Much of the 
material has never before appeared in print. 


All programs are UNPROTECTED, and hence can be copied, 
listed, and modified at will. (special patches are described in 
the manual). They require one drive, DOS 3.3, and 48K of RAM. 


Golden Delicious Software Ltd. 
Suite 3308, 350 Fifth Ave. 
New York, New York 10001 
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2260 USE. AUXMOVE 
2270 ® Fetch what should be a "0" 
2280 * or "1" to be AUXMOVE's carry 
0836—- A4 34 2290 LDY MON .YSAV 
0838- B9 00 02 2300 LDA IN,Y 
2310 * Shift woot ene fetched to carry 


O83B=- HA 2320 

2330 * Save carry while comparing 
083C- 08 2340 HP 

2350 * This is a "0" or "1" after a LSR 
083D=- C9 58 2360 CMP #*°0"/2 
O83F- DO 3E 2 fo BNE INVALID.CARRY 
0841- E6 34 23 INC MON.YSAV 


2390 ® Recover cay 


0843- 28 2400 

2410 CALL. AUXMOVE.WITH.CARRY 
O844- 20 11 C3 2420 JSR AUXMOVE 
O847- 60 a ae RTS 


2450 USE.XFER 
2460 # Set XFER Transfer address 
2470 # from monitor parameter 


0848 BS 3C = 2480 LDA MON.A1,X 
O84A- 9D ED 03 2490 STA TRANSFER ,X 
O84D- CA 2500 DEX 

O84E- 10 F8 2510 BPL USE.XFER 


2520 * Fetch what should be a "0" 
2530 * or "1" to be XFER's carry 
0850— AX 34 25 LDY MON.YSAV 
0852- BO 00 02 2550 LDA IN,Y 
2560 ® Shift what te fetched to carry 


0855=- 4A 2570 
2580 # Save carry for a while 
0856- 08 2590 PHP 
2600 * This is a ao or "1" after a LSR 
0857- C9 58 26 10 P #"0"/2 
0859= DO 24 2620 BNE INVALID .CARRY 
O85B- E6 34 26 30 INC MON.YSAV 


2640 * Fetch what should be a "Q" 
2650 # or a "1" to be XFER's overflow 
O85D- C8 2660 INY 
O85E=- BQ 00 02 2670 LDA IN,Y 
2680 # Shift what ve fetched to carry 


0861—- 4A 2690 

2700 ® Save this carry too, while we compare 
0862- 08 2710 H 

2720 * This is a "0" or "1" after a LSR 
0863- C9 58 2730 CMP #"0"/2 
0865= DO 17 2740 BNE INVALID.OVERFLOW 
0867=- E6 34 2750 INC MON.YSAV 

2760 * Recovered carry is valid overflow 
0869- 28 2770 

2780 ® Move it back to bit 0 
O86A- 2A 2790 ROL 

2800 ® Recover carry 
O86B- 28 2810 P 

2820 * Construct overflow 
O86C- B8 2830 CLV 
O86D- 29 01 2840 AND arOOU0. 0001 
O86F- FO 03 2850 BEQ . 
0871- 2C 7B 08 2860 BIT SEV 


2870 * Save BSR bank, BSR ram read, and SP 
2880 * for any calls or returns to main/auxmem 


O874- 20 61 09 2890 .1 JSR SAVE.BSR.STATE 
O877- BA 2900 TSX 
0878- 8E CF 03 2910 STX BANK.SP.SAVE 


2920 UMP. XFER.WITH.CARRY.AND.OVERFLOW 
2930 ® Routines in aux/main bank may jmp 
2940 * to RETURN.TO.MAIN/AUX when done 


O87B- 4C 14 C3 £290 SEV JMP XFER 

2970 INVALID.OVERFLOW 
O87E- 28 2980 PLP 

2990 INVALID.CARRY 
O87F=- 28 000 L 

010 * Let's not process rest of line 

O880- AX 34 3020 LDY MON .YSAV 
08 82- 4g D ona LDA #$8D 
O884- 2 00 02 3040 STA IN,Y 
O887~ 4C DD FB 3050 JMP BEEP 
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3060 Fee eee eee eee eee Qee eee eee eee ee wm 
3070 SWITCH. MIND 
3080 * Check in main or aux no 


O88A=- AD 13 CO 3090 LDA READ.RAM. READ. STATUS 
O88D- 10 03 3100 BPL ENTER. AUX.MON 
O88F- 4C 25 09 3110 JMP RETURN.TO.MAIN 
3120 ENTER. AUX.MON 
3130 * Move USE.AUXMEM to auxmem too 
0892- AJ 03 3140 LDA #USE.AUXMEM 
O894- 85 3C 150 STA MON.A1 
0896- 85 42 160 STA MON. 
0898- AQ 08 Us LDA /USE.AUXMEM 
O89A- 85 3D 3180 STA MON.A1+1 
089C- 85 3 190 STA MON. A4+1 
O89E- AOC 200 LDA #USE.AUXMEM.END 
O8A0- 85 3E 210 STA MON.A2 
O8A2=- AQ 09 3220 LDA /USE.AUXMEM.END 
O8A4- 8 3F 3230 STA MON .A2+1 
O8A6- 240 SEC 
O8AT=- 20 11 C3 3250 JSR AUXMOVE 
3260 * Save BSR bank, BSR ram read, and SP 
32i0 # for calls and ’ return to main men 
O8AA- 20 61 09 3280 JSR SAVE.BSR.STATE 
O8AD—- BA 3290 TSX 
O8AE- 8E CF 03 3300 STX BANK.SP.SAVE 


3310 * Continue in auxmem w/rom 
STA READ.AUX.RAM 
STA WRITE.AUX.RAM 


O8B7- 8D 09 CO 3340 STA USE. AUX.ZP.STK.BSR 
O8BA- AD 81 CO 3350 LDA Bok - ROM. READ .RAM.WRITE 
O8BD- AD co 360 LDA BSR.2.RQOM.READ.RAM.WRITE 
0 * What else but this too 
O8CO- A2 FF 3380 LDX #$FF 
O8C2- 9A 82° 
0O * Copy rom monitor to auxmem BSR 
08C3=- AO 00 410 LDY #MONITOR 
O8C5=- 84 3C 3420 STY MON.A1 
O8C7—- 84 48 3130 STY MON.STATUS 
O8C9- AZ F8 3iee LDA /MONITOR 
O8CB- 85 3D 450 STA MON.A1+1 
O8CD- Bi 3C 3460 .1 LDA ee Al rf 
O8CF- 91 3C 300 STA (MON.A1 
O8D1=- C8 31 0 INY 
O8D2= DO F9 490 BNE .1 
O8D4=- E6 3D 3500 INC MON.A1+1 
O8D6- DO F5 3510 BNE .1 
3220 # Now use auxmem BSR 
O8D8- AD 83 CO 3530 LDA BSR.2.RAM.READ.RAM.WRITE 
O8DB- AD 83 CO 3540 EDK BSR.2.RAM. READ. RAM.WRITE 
550 * Fix monitor in aa ae 
O8DE- AQ 09 560 LDA /DO.CLREOL 
O8EO- 8D 8D FD 3570 STA MON .JSR.CLREOL+2 
O8E3- AQ 6E 3580 LDA #DO.CLREOL 
O8E5- 8D 8C FD 3230 STA a ete CLREOL+1 
38 O # Hook I/0 three ugh a 
O8E8- AQ 70 610 A #COUT. TO. MAIN 
O8EA- 85 36 3620 STA MON .CSWL 
O8EC- AQ 90 630 LDA SHORE T FROM.MAIN 
O8EE- 85 38 640 STA MON .KSWL 
O8FO- AQ 09 650 LDA yCOUT TO.MAIN 
O8F2- 85 37 3660 STA MON .CSWL+1 
670 * LDA /RDKEY.FROM.MAIN 
O8F4- 85 39 680 STA MON. Silas ze 
690 # USE.AUXMEM in auxmem 
O8F6=- 20 12 08 3700 JSR CONNECT. CONTROL. Y 
3130 # Do page 3 loc: 
O8F9- 8D FB 03 3720 STA NMI 
O8FC- AQ 65 3730 LNA ae 
O8FE- 8D FC 03 3740 Si 4 NMI+ 
0901- 8D FE 03 3750 Sta MON. IRQLOC 
090H- AJ FF 760 LDA /MON 
0906- 8D FD 03 3770 STA NMI+2 
0909- 8D FF 03 3780 STA MON .IRQLOC+1 
090C- AQ 5 3790 LDA #MON .OLDBRK 
O90E- 8D FO 03 3 00 STA MON .BRKV 
0911- AQ FA 810 LDA /MON .OLDBRK 
0913- 8D Fi 03 3820 STA MON .BRKV+1 


3830 * Enter monitor in auxmem BSR 
0916=- 4C 65 FF 3840 JMP MON 
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pow mi te eo Ff DD em «@ 
Ceastrom CHARACTER ses 


One of the features “hidden” in many printers available today 

is their ability to accept user-defined character sets. With the 
proper software, these custom characters are “downloaded” from 
your Apple II computer to the printer im a fraction of a second. 
Once the printer has “learned’ these new characters, they will 
be remembered until the printer is turned off. 


After the downloading operation, you can use your printer with 
virtually any word processor. Just think of the possibilities! 
There’s nothing like having your own CUSTOM CHARACTERS to help 
convey the message. And you still have access to those built-in 
fonts as well! Here’s a quick look at some possible variations: 


BUILT-IN CUSTOM 
10CPI: AaBbCcDdEeFFfGgHhI i Jj KK AaBbCcDdE€ef FEQHHI 6 3 SKK 
12CPI1: AaBbCcDdEeFfGgHh] i Jj Kk AaBbCcDdtef FGgqHh di J kk 
17CPI: AaBbCcDdEeF fGgHh] i J jKk AaBoCcBdCeF Fal ti J skh 
SCFI: Aaboebcc Dae e FF AaBbCe DAE e& F F 
S6CPI: RPMaBbCcDdEeF fF AaBbBoccDde ef F 
SCPI: AaBbCcDdEeF f AaBOCcDdteF F 


And let’s not forget Enhanced and Underined printing as well... 


AaBbCcDdEeFfGgHh! i Ji Kk RabbCcDd€ef FEQHHII I SKE 
AaBbCcDdEeFFfGqHh! i Jj KK AaBbbCcDd€ef FGgHhI1 3 SKK 


The Font Downloader & Character Editor software package has 

been developed by RAK-WARE to help you unleash the power of your 
printer. The basic package includes the downloading software with 
4 tonts to get you going. Also included is a character editor so 
that you can turn your creativity loose. Use it to generate unique 
character fonts, patterns, symbols and graphics. A detailed user’s 
quide is provided on the program diskette. 


SYSTEM REQUIREMENTS: 

x APPLE II, APPLE II Plus, APPLE //e or lookalike with 4&K RAM 

* “DUMB Parallel Printer Intertace Board (like Apple’s Parallel 
Printer Interface, TYMAC’s PPC-100 or equivalent? 


The Font Downloader & Editor package is only $37.95 and is currently 
availatle for either the Apple Dot Matrix Printer aor C.Iltoh SS10AF 
(specify printer). Epson Fx-80 and OkiData versions coming soon. 
Enclose paryment with order ta avoid $3.00 handling & postage charge. 


RP Re HE - Ww A HK FCF 
41 Ralph Road West Orange New Jersey 07052 


Say You Saw It In APPLE ASSEMBLY LINE! 
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3850 #------ ee eee 

3860 RETURN.TO. AUX 

3B Re # Continue in aux 
0919= 8D 03 CO 0 STA READ. AUX. RAM 
091C=- 8D 05 CO 3890 STA WRITE.AUX. RAM 
O91F- 8D 09 CO 3900 STA USE.AUX.ZP.STK.BSR 
0922= HC 2E 09 3910 JMP RETURN.COMMON 

3355 RETURN .TO.MAIN 

230 # Continue in main ram 
0925=- 8D 02 CO 3940 STA READ .MAIN. RAM 
0928=- 8D O4 CO 3950 STA WRITE.MAIN.RAM 
092B- 8D 08 CO 3960 STA USE .MAIN.ZP.STK.BSR 
ZL RETURN .COMMON 

3980 * Recover SP 
O92E- AE CF 03 3320 LDX BANK.SP.SAVE 
0931- 9A 000 X 

4010 RESTORE.BSR.STATE 
0932—- B8 4020 CLV 
0933=- AE CD 03 4030 LDX BANK.BSR.BANK.SAVE 
0936= 10 15 4040 BPL .2 
0938— AE CE 03 4050 LDX BANK.BSR.RAM.READ.SAVE 
093B- 10 08 4060 BPL .1 
093D- AE 83 CO 4070 LDX BSR.2.RAM. READ. RAM. WRITE 
0940— AE 83 CO 4080 LDX BSR.2.RAM.READ.RAM.WRITE 
0943—- 50 1 4090 BVC .4 
0945- AE 81 CO 4100 .1 LDX BSR.2.ROM.READ.RAM.WRITE 
O948—- AE 81 CO 4110 LDX BSR.2.ROM.READ.RAM.WRITE 
O94B- 50 43 4120 BVC .4 
O94D- AE CE 03 yipe 2 LDX BANK.BSR.RAM.READ.SAVE 
0950=- 10 08 4140 BPL . 
0952=— AE 8B CO 4120 LDX BSR. 1.RAM. READ. RAM. WRITE 
0955=- AE 8B CO 4160 LDX BSR.1.RAM. READ. RAM.WRITE 
0955 50 06 410 BVC .4 
O95A- AE 89 CO 4180 .3 LDX BSR. 1.ROM.READ.RAM.WRITE 
095D- AE 89 CO 4190 LDX BSR.1.ROM.READ.RAM.WRITE 
0960- 60 4200 .4 RTS 

a ae ne en nr a ee EN 

4220 SAVE.BSR.STATE 
0961—- AE 11 CO. 4230 X READ.BSR.BANK 
0964- 8E CD 03 4240 STX BANK.BSR.BANK.SAVE 
0967—- AE 12 CO 4250 LDX READ. ; READ 
096A- 8E CE 03 4260 STX BANK.BSR.RAM.READ.SAVE 
096D- 60 4270 RTS 

H280 Sewn e ww ewww meee nome eee w ewe wew wwe 

4290 DO.CLREOL 
O96E- AQ 9D 4300 LDA #"J]"~"@! 


4310 cour. TO.MAIN 
4320 ® Save auxmem's X 


0970- 8E CC 03 1330 STX BANK.X.SAVE 
4340 # Save BSR bank, BSR bong read, and SP 
4350 ® over call to main r 
oat - 4 61 09 4360 Joh SAVE. BSR. STATE 
0977- 8E CF 03 4350 STX BANK.SP.SAVE 
1320 # Continue in main ram 
O97A- 8D 02 CO 4400 STA READ .MAIN. RAM 
0 [D- D O4 CO 4410 STA WRITE.MAIN. RAM 
0980- 8D 08 CO ease 5 gore USE .MAIN.ZP.STK.BSR 
ecover 
03 BR Ae CF 03 Aig LDX BANK.SP.SAVE 
0987- 20 32 09 4460 JSR RESTORE.BSR.STATE 
O98A=- 20 ED FD rr Ss JSR MON .COUT 
098D=- HC AF 09 rte : JMP I0.COMMON 
4500 RDKEY . FROM.MAIN 
4510 * Repair monitor's sillier attempt 
0990- 91 28 4520 STA (MON . BASL ) , Y 
mene # Save auxmem's X 
0992- 8E CC 03 45 STX BANK.X.SAVE 
1220 ® Save BSR bank, nae ran read, and SP 
4500 * over call to ma 
i a 61 09 Heb ts SAVE. BSR. STATE 
99 8E CF 03 4590 STX BANK.SP.SAVE 
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4600 * Continue in main ram 
099C- 8D 02 CO 4610 STA READ.MAIN.RAM 
O99F=- 8D O04 CO 4620 STA WRITE.MAIN. RAM 
O9A2— 8D 08 CO 830 STA USE.MAIN.ZP.STK.BSR 
O9A5—- AE CF 03 4640 LDX BANK.SP.SAVE Recover SP 
O9A8=- 9A 4650 TXS 
O9A9= 20 32 09 4660 JSR RESTORE.BSR.STATE 
O9AC- 20 OC FD ne ao P JSR MON .RDKEY 
4690 I0.COMMON 
O9AF- 8D 03 CO 4700 STA READ .AUX. RAM Continue in Aux RAM 
O9B2- 8D 05 CO 4710 STA WRITE.AUX'. RAM 
O9B5- 8D 09 CO 4720 STA USE.AUX.ZP.STK.BSR 
O9BS—- AE CF 03 4730 LDX BANK.SP.SAVE Recover SP 
O9BB- 9A 4740 TXS 
O9BC~ 20 32 09 4750 JSR RESTORE.BSR.STATE 
O9BF=- AE CC 03 4760 LDX BANK.X.SAVE Recover X 
09C2—- 60 4770 RTS 


65C02 


People who have started reading AAL since last December have 
asked what is all this 65C02 business, anyway? Well the 65C02 
is a new CMOS version of the 6502 microprocessor. (CMOS stands 
for Complementary Metal Oxide Semiconductor. That's a 
different way of making chips. CMOS circuits are noted for 
extremely low power consumption and extremely high sensitivity 
to static electricity.) To us Apple owners, the important 
thing is that the designers of the new chip corrected the bugs 
in the 6502 and added several new instructions and addressing 


modes. 


The new instructions include PHX, PLX, PHY, and PLY (push ana 
pull the X and Y registers from the stack), BRA (branch 
always), STZ (store zero), TSB and TRB (test and set or reset 
bits), and SMB, RMB, BBR and BBS (set, reset and branch on 
Single bits). The main new addressing mode is true indirect 
without indexing, LDA ($12). This mode is now available for 
ORA, AND, EOR, ADC, STA, LDA, CMP, and SBC. There are also new 
modes for the BIT and JMP instructions. INC and DEC can now 
work on the A register. 


There are some problems, though. Rockwell, GTE, NCR, and 
Synertek (maybe) are manufacturing 65C02 processors, but they 
are not all the same. The SMB, RMB, BBS, and BBR instructions 
are only available in the Rockwell chip. The NCR chip works in 
the Apple //e, but not in older Apples. The GTE processor does 
work in all Apples (this is being written on an Apple ][+ with 
a GTE 65C02). I haven't yet gotten a sample of the Rockwell 
processor, so I don't personally know if it works in older 
Apples. Some people say yes, others no. 


That's a summary of what we know so far. The confusion is 


beginning to clear up, but there are still questions about what 
will or won't work in which Apples, and why. Stay tuned... 
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Speeding Up SpiralS.....ccccceccccevcesceeeee BOD Sander—Cederlof 


Several have written to us about Roger Keating's Spiral Screen 
Clear (AAL June 1983). Charles Putney, who you may remember as 
the first one to double the speed of the prime number program 
in AAL several years ago, has now applied his talent to 
unwinding the screen. 


Roger's program ran in 55 seconds, my table-lookup for BASCALC 
shortened it to 40 seconds. Charlie wrote the whole thing out 
as one long string of LDA-STA pairs, and trimmed the time to 
only 7 seconds! 


Let's see...there are 960 characters on the screen. If I write 
a LDA-STA pair to move each byte ahead one position along the 
Spiral path, I will have 959 such pairs. Each LDA and each STA 
will take 3 bytes, so the program to shift the whole screen one 
step around the spiral path will take 2x3x959 = 5754 bytes. 

Add another 5 bytes to LDA #S$A0 and store it in the center of 
the screen before the first rotation. Then add some code to re- 
run the 959 steps 959 more times, so that the whole screen 
clears, and you get Charlie's program, 5777 bytes. 


Now try to type it all in! Don't worry, we aren't even going 
to list it here. It will be on the next Quarterly disk, 
though. 


Charlie decided to use five macros, to decrease the amount of 
manual labor involved. He defined a macro named MOVE which 
builds the LDA-STA pair for a pair of arguments: 


~MA MOVE 
LDA J}1 
STA ]2 
EM 


Then he defined one macro for each leg of the spiral: MOVED, 
MOVEL, MOVEU, and MOVER for down, left, up, and right respec- 
tively. With a few comment lines, the macro definitions take a 
mere 488 lines! The macros are each called with three 
parameters: 


>MOVED col,low.row,high.row 
>MOVEL row,low.col,high.col 
>MOVEU col,low.row,high.row 
>MOVER row, low.col,high.col 


The definitions out of the way, it only remains to write 12 
sets of 4 macro calls, or 48 lines, and a driving loop to do it 
all 960 times. Here is a condensed listing of the actual code 
part of Charlie's program: 


Apple Assembly Line.....August, 1983.....Copyright (C) S-C SOFTWARE....Page 13 


PR Cre 
{x} 
> eo) 
< z 
= fx 
more 
fx] OO ea 
a <= WwW 
e MAHA 
A was 
(x4 eno 
oO <5: 
fa =] 
e He eo oS nN A co wo 
— muDS0ORF n fo =] te oO Ww =z m WN - MH AFNUMN MAN 
z, Ors O a.c6 ROHN BAM ReermM wom IAM Town" Mr—V) Nom aed alton | OF = FT oe ow a 
<= wm MN &§ MMN =&§ AMN «© MN «® OMe 28 DAME a OMe « MN a WOME a NMeKO QD ac of 
= Oo (o> ) Neo Ne eN Nae eM Ne ar Ne AN FF 2 aQ FM Bem KK OO KM RN KM en ee OFORF Sere 
oO ° Cc MOO —em o ANA « LVN) « Tor « WNL a apow a art a Odd a QO Ew on = oF 
oO MO oF eM we ON New Ma ODO Ten Wm oem an Daan Oe ag OQ mv oe oN 
Og +— MO”VAN —=CON aN arROK STIAM™ ANSE BOM ate COMKH NOK CKD “Kor 
A. Ope e £900 OCBMGe KF EME NEM MEM FEM MEME CBM EME ORME NORMS RK aN Keene Fre = fea 


a FOP PF OPP PPP OE POP PEP RP PP PP PEEP PP PP PP Pr PPP > PP PP bb > > 
4 OS fa <ai{<axnm OOOO COCO S000 S000 COCO SCOO0O0 COO0O0 COCO CO0DO COCO DOOD COCO ><> >11020 
wOr ASBAO Z2ZEZ4 ZALL4 LALL LLAR LAZAR BLED LLEE BLED BETES BEEZ TEED STEE WASWAsZH=E 
Ye e HANA AAAN AAAKRANR AARAARN ARARKR ARAANR AAKAKR AAANR AARKR AARAKR ARKAA AAAA AAAA QOUMNALAR? 
J 
< 
os = i) 
H a - 
Rus Au Bis 
22s se) sn & * Cs s s * s s s ed s | 


eb hehntn hn hihi k bho hn andi ho po tololaololulolololololololololololnlololololololololololololololololololololelolelololololololololololofelolololololel-lolol-fo) 
O TN MATING CONDO © UOT LW P00 DOO MEP LNW BO NO FOU MET LAW EOD NOFA MET LAO EO NO &— CY MET LNW ECO NOK NUM LORD ECONO — AM INO EO ON 
BP SD SD SD TST AT AT AT AT LOUD LALA LALLA LW... .010010 11000 BEE EEE EE -I00 O DDD DODD ANMAAMAMAMAAANOOOOOOCDOOOF Kee Re Keene 
WWD DDOWW DD OW DOW DOWD DDD 10 101010 WD UD WD. WD DLO I WD WD DD DD DWN D100 PE EEE ERR EER EERR REED 


~Copyright (C) S-C SOFTWARE 


August, 1983.... 


eApple Assembly Line.... 


Page 14... 


APPLESEED 


HARDWARE FOR ASSEMBLY 
LANGUAGE PROGRAMMERS 


Appleseed boards allow systems to be designed and programmed on a standard 
Apple Computer and then produced with a board set which costs a fraction of 
what an Apple Computer would cost. This approach allows the use of a 
multitude of sophisticated programming and hardware tools which have been 
designed for use on the Apple Computer. Low cost, small size, low power 
consumption, and flexibility are the advantages with Appleseed. All of the 
Apple bus conventions are preserved which allows the use of almost any custom 
board which has been designed for use in the Apple computer. Programs are 
developed using a good editor/assembler (such as S-C Macro); then after the 
system is debugged and running properly, a set of EPROMS are blown and 
inserted into the destination machine. Soon we will have available a set of 
boards which will allow direct loading of the program from your Apple computer 
into the Appleseed for the testing of the program prior to actual blowing of a 
set of EPROMS. 


The Appleseed approach allows the greatest possible flexibility in system 
design. You can pick and choose among the various Appleseed components as 
well as a multitude of peripheral boards made by others in order to design your 
own customized system. The only limitation is that we don't supply firmware 
and we don't support the standard Apple CRT graphics. Flexibility is the 
keyword! You buy only what you need for your application. 


Optional packaging is also available. We have a "cute little box with walnut 
side panels" or a 19 inch rack mount with built-in disk drives. 


Appleseed products are not available through computer stores. For more 
information call or write us directly. Also look for us at the Applefest in 
San Francisco, October 28th-30th. 


Apple is a registered trademark of Apple Computer Inc. 


DOUGLAS ELECTRONICS - 718 MARINA — SAN LEANDRO, CA 94577 — (415) 483-8770 
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Remember, the whole source with the full macro definitions will 
be on the next quarterly disk ($15, for all source code in 
issues July-August-September 1983). 


Because Charlie's program makes such heavy use of macros, it 
takes considerable time to assemble. He timed it at nearly two 
Minutes. If the program were written out the long way, without 
macros, it would take only about 20 seconds to assemble. 


Charlie pointed out that we are needlessly moving the center of 
the spiral, which is already blank. As the blanked portion 
grows, this becomes very significant. In fact, by eliminating 
moving the cleared portion, the time could be further reduced 
to only 3 1/2 seconds. Each LDA-STA takes 8 cycles. The long 
way takes 959*960 pairs, plus some overhead. Ignoring the 
overhead, we get 7365120 cycles, or about 7.2 seconds. 
Forgetting the blanked stuff makes it 3.6 seconds. Any takers? 


And I was just wondering...how about an Applesoft program which 
writes the 959 LDA-STA pairs as assembly language source on a 
text file? Or POKEs the actual object code, by computing the 
cape necessary, into a binary buffer area. Again, any 
takers? 


fi TS I hE NE A Tia RN RR TR eee ee 
NEW from Laumer Research 
The S-C Macro Assembler Screen Editor. 


Powerful Screen Editor for assembler files, co-resident with 
the S-C Macro Assembler allowing screen editing when you want 
it and S-C Macro Assembler editing too. Loads in the unused 
4K bank of memory in a 16K Language Card. 


Includes SYSGEN program for configuring standard 40 column 
Apple, 80 column VIDEX, or 80 column STB80 video drivers. 
Ajustable tabs, margins, horizontal and vertical scrolling, 
lines to 248 columns, and much more... 


SOURCE code included. (Lets you learn about screen editors 
and configure for other brands of 80 column boards) 


Based on a popular TI 990 editor for software developers. 
NOTE: this is not a word processor editor. Organized just for 
computer languages. If you work with assembly programs of 100 
lines or more, then a Screen Editor is a MUST! 


Requires 64K APPLE II with Language card and S-C Macro 
Assembler Language Card Version 1.0. 


Price $49.00 from LAUMER RESEARCH 
1832 SCHOOL RD. 
CARROLLTON, TX 75006 


Master Card and Visa accepted (send Name, card number and exp. 
date). Foreign orders add $3.00 shipping (US funds only). 
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Tinkering with Variable Cross Reference..........eLouiS Pitz 
De Witt, Iowa 


I am a tinkerer! Yes I love to take programs and add features 
to improve them. Sometimes the “improved” version even works! 
Usually I learn a lot about humility, and occasionally a bit 
about programming. 


A case in point is the program for doing an Applesoft Variable 
Cross Reference (from the November 1980 issue of Apple Assembly 
Line). I just recently got Quarterly Disk #1 with its source 
code, and so it became "tinker-time", 


VCR works just fine, and is fast! But it only produces 40- 
column output, and I wanted both 40-column screen and 80-column 
printer hardcopy. Here are some patches which will do the job. 
It makes a good short example of changing output hooks in the 
Middle of a program without goofing up DOS. 


1060 -TF B.VCRP “°P" FOR PRINTER VERSION 

4534 LDA #0 RESET COUNTER TO 0 

4538 STA $6 FOR EACH VARIABLE 

4821 INC $6 COUNT THE SCREEN LINE 

4822 LDA $6 

4823 AND #1 LOOK AT ODD-EVEN BIT 

4824 BEQ TAB.NEW.LINE BOTH SCRN AND PRINTER 
4825 LDA #$FDFO ONLY SCRN GETS NEW LINE 
4826 STA $36 SO DISCONNECT PRINTER 

4827 LDA /$FDFO 

4828 STA $37 

4829 JSR $3EA PASS TO DOS 

4830 JSR MON.CROUT SCREEN ONLY 

4831 LDA #$C100 REHOOK PRINTER 

4832 STA $36 

4833 LDA /$C100 

4834 STA $37 

4835 JSR $3EA PASS TO DOS 

4836 BNE .1 -- ALWAYS 


To use the printer version of VCR, BRUN B.VCRP. This sets up 
the ampersand vector. Then LOAD your Applesoft program. Use 
PR#1 to turn on your printer. Then type “&" and RETURN, and 
watch the cross reference. 


If your printer is in some slot other than 1, change lines 4831 
and 4833 to the correct value ($Cs00, where s=slot#). 
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APPLIED ENGINEERING 


THE BEST PERIPHERALS FOR THE BEST COMPUTER 


The TIMEMASTER 
Finally a clock that does it ALL! 


es 


@ Designed in 1983 using I.C. technologies that simply did not exist 
when most other Apple clocks were designed. 

@ Just plug it in and your programs can read the year, month, date, day, 
and time to 1 millisecond! The only clock with both year and ms. 

@ Powerful 2K ROM driver — No clock could be easier to use. 

@ Full emulation of most other clocks, including Mountain Hardware’s 
Appleclock (but you'll like the TIMEMASTER mode better). 

@ Basic, Machine Code, CP/M and Pascal software on 2 disks! 

@ Eight software controlled interrupts so you can execute two programs 
at the same time. (Many examples are included) 

@ On board timer lets you time any interval up to 48 days long down to 
the nearest millisecond. 

The TIMEMASTER includes 2 disks with some really fantastic time 

oriented programs (over 25) plus a DOS dater so it will automatically add 

the date when disk files are created or modified. This disk is over a 

$200.00 value alone — we give the software others sell. All software 

packages for business, data base management and communications are 

made to read the TIMEMASTER. 


If you want the most powerful and the easiest to use clock for your Apple, 


you want a TIMEMASTER. PRICE $129.00 


Super Music Synthesizer 


@ Complete 16 voice music synthesizer on one card. Just plug it into your 
Apple, connect the audio cable (supplied) to your stereo, boot the 
disk supplied and you are ready to input and play songs. 

It's easy to program music with our compose software. You will start 
right away at inputting your favorite songs. The Hi-Res screen shows 
what you have entered in standard sheet music format. 

Now with new improved software for the easiest and fastest music 
input system available anywhere. 

We give you lots of software. In addition to Compose and Play 
programs, 2 disks are filled with over 30 songs ready to play. 

Easy to program in Basic to generate complex sound effects. Now your 
games can have explosions, phaser zaps, train whistles, death cries. 
You name it, this card can do it. 

Four white noise generators which are great for sound effects. 

Plays music in true stereo as well as true discrete quadraphonic. 
Full control of attack, volume, decay, sustain and release. 

Will play songs written for ALF synthesizer (ALF software will not take 
advantage of all the features of this board. Their software sounds the 
same in our synthesizer.) 

@ Automatic shutoff on power-up or if reset is pushed. 


@ Many many more features. PRICE $159.00 


Z-80 PLUS! 


@ TOTALLY compatible with ALL CP/M software. 

@ The only Z-80 card with a special 2K “CP/M detector’ chip. 

@ Fully compatible with microsoft disks (no pre-boot required). 

@ All new 1983 design incorporates the latest in I.C. technologies. 


@ Red”’CP/M WORKING” LED indicator, the Z-80 Plus does not interfere 
with non-CP/M programs. 

@ An on-card PROM eliminates many I.C.’s for a cooler, less power 
consuming board. (We use the Z-80A at a fast 4MHZ) 

@ Does EVERYTHING the other Z-80 boards do, plus Z-80 interrupts. 


Don’t confuse the Z-80 Plus with crude copies of the microsoft card. The 
Z-80 Plus employs a much more sophisticated and reliable design. With 
the Z-80 Plus you can access the largest body of software in existence. 
Two computers in one and the advantages of both, all at an unbelievably 
low price. 


PRICE $139.00 
COMING SOON: The Z-80 Plus for the Apple III 


Viewmaster 80 


There used to be about a dozen 80 column cards for the Apple, 
now there’s only ONE. 


@ TOTALLY Videx Compatible 

@ 80 characters by 24 lines, with a sharp 7x9 dot matrix 

@ On-board 40/80 soft video switch with manual 40 column override 

@ Fully compatible with ALL Apple languages and software — there are 
NO exceptions 

@ Low power consumption through the use of CMOS devices 

@ All connections on the card are made with standard video connectors, 
no cables are soldered to the board 

@ All new 1983 design (using a new Microprocessor based C.R.T. 
controller) 


JUST COMPARE! 


EIN Spatany 
SOUTSWITO ed SUPPORT 


YES VES 
NO YES 
NO NO 
YES YES 
NO YES 
YES YES 


“wot 


UE YEN aC OLN 
MATa INPUTS 


OVERRIDE 


INVERSE 
cUramac TERS 


YES 
YES 
YES 
NO 
YES 
YES 


«¢ yaPATIRLL 
VES 
NO 
YES 
YES 
NO 
YES 


VIEWMASTER 
SUP’RTERM 
WIZARD80 
VISION80 
OMNIVISION 
VIEW MAX80 
SMARTERM 360 YES YES YES NO NO YES NO 
VIDEOTERM 345 NO NO NO YES YES NO YES 
The VIEWMASTER 80 works with all 80 column applications including CP/M, Pascal, 
WordStar, Format !I, Easywriter, Apple Writer UI, Viscalc, and many others. The 
VIEWMASTER 80 is THE MOST compatible 80 column card you can buy at ANY price! 


PRICE $169.00 


169 
375 
245 
375 
295 
219 


YES 
NO 
YES 
YES 
NO 
YES 


YES 
NO 
NO 
NO 
NO 
NO 


YES 
YES 
YES 
NO 
YES 
NO 


MemoryMaster Ile 128K RAM Card 


@ Expands your Apple Ile to 192K memory 

@ Provides an 80 column text display 

@ Compatible with all Apple Ile 80 column and extended 80 column 
card software (Same physical size as Apple’s 64K card) 

@ Available in 64K and 128K configurations 

@ Bank select LED’s for each 64K bank 


@ Complete documentation included, we show you how to use all 128K. 
If you already have Apple’s 64K card, justorder the MEMORYMASTER with 
64K and use the 64K from your old board to give you a full 128K. (The board 

is fully socketed so you simply plug in more chips.) 


@ Permits your Ile to use the new double high resolution graphics 
@ Automatically expands Visicalc to 95K storage in 80 columns! The 64K 
configuration is all that’s needed, 128K can take you even higher. 


MemoryMaster with 128K 
Upgradeable MemoryMaster with 64K 
Non-Upgradeable MemoryMaster with 64K 


$249 
$169 
$149 


Our boards are far superior to most of the consumer electronics made today. All l.C.’s are in high quality sockets with mil-spec. components used throughout P.C. boards are 

glass-epoxy with gold contacts. Made in America to be the best in the world. All products work in APPLE tle, tl, 1+ and Franklin (except MemoryMasten). 

Applied Engineering also manufactures a full line of data acquisition and control products for the Apple; A/D converters and digital 1/0 cards. etc. Please call for more 

information. All our products are fully tested with complete documentation and available for immediate delivery. All products are guaranteed with a no hassle 

TAREE YEAR WARRANTY: Send Check or Money Order to: 

APPLIED ENGINEERING 
P.O. Box 470301 


Dallas, TX 75247 


Call (214) 492-2027 
7a.m. to 11p.m. 7 days a week 
MasterCard, Visa & C.0.D. Welcome 


All Orders Shipped Same Day. Texas Residents Add 5% Sales 
Tax. Add $10.00 If Outside U.S.A. Dealer Inquiries Welcome. 
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Reversing, Getting, and Putting Nybbles....Bob Sander-Cederlof 


In the process of de-crypting a large data base, I needed to 
reverse the nybbles in each of roughly 32000 bytes. There are 
probably a lot of ways to do this, but I found one which takes 
only 12 bytes to reverse the nybbles in the A-register. 


Just to be sure we agree on what I am talking about, here is a 
little diagram: 


One way, sort of brute force, involves breaking the nybbles out 
and remerging them: 


ASL SHIFT EFGH LEFT 


LSR SHIFT ABCD RIGHT 


ORA TEMP RE~MERGE NYBBLES 
STA (PNTR) ,Y 


From another perspective, I am trying to rotate the data byte 
half-way around. But if I try to do it with ROL or ROR 
instructions, one bit gets left in CARRY, and an extra bit gets 
inserted in the middle. Here is how I finally did it: 


LDA (PNTR) ,Y abcd efgh 


ASL bede fgh0 
ADC #0 bcde fgha 
ASL cdef gha0 
ADC #0 cdef ghab 
ASL defg habO 
ADC #0 defg habc 
ASL efgh abcO 
ADC #0 efgh abcd 


STA (PNTR) ,Y 


Each ASL-ADC pair shifts the byte around one bit. The ASL 
shifts the leftmost bit into the CARRY bit, and a zero into the 
right end. The ADC #0 adds CARRY into the rightmost bit. 


Naturally, curiosity forces me to look at the possibility of 

shifting right one bit also. We have LSR ana ROR, of course, 
but both of these leave the shifted out bit in CARRY. I want 
that bit back in the sign position, like this: 
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ABCDEFGH should become HABCDEFG 


Two Similar methods come to mind, depending on how I might use 

it. If the byte to be shifted is in A-reg, and needs to remain 
there, and I don't want to upset any other registers, I can do 

it like this: 


PHA save unshifted value 

LSR get rightmost bit in CARRY 

PLA restore unshifted value 

ROR shift again, putting right bit on left 


If the byte to be shifted is in memory, and I want the results 
to be in memory, I might do it like this: 


LDA FLAG 
LSR RIGHTMOST BIT INTO CARRY 
ROR FLAG SHIFT BYTE, PUTTING RIGHT INTO LEFT 


Note that I can branch according to the value of the bit which 
moved around by using BMI or BPL, because that bit is the new 
Sign bit. 


The last method above can be useful when you have a program 
that needs to alternate between two paths. For example, 
Suppose I write a program to pick up the “next nybble® from a 
data area. The first time I call it, I want to get the left 
nybble of the first byte. Next time, the right nybble of the 
same byte. Next time the left nybble of the next byte. And so 
on. 


I might store the value $55 in FLAG initially, and then use LDA 
FLAG, LSR, ROR FLAG, to shift it around. FLAG will alternate 
between $55 and SAA. My subroutine can alternate between left 
and right nybbles. 


Not to leave you hanging, I wrote “get next nybble” and "put 
next nybble“ subroutines. By the time I finished polishing, 
yet another technique had surfaced for rotating the $55/SAA 
flag. I used this new method so as not disturb the contents of 
the A-register. 


To set up either routine, the address of the beginning of the 
data area must be put into PNTR and PNTR+1, and $55 must be put 
into FLAG. 


1000 *SAVE NYBBLE GET & PUT 
0000- 1020 PNTR .EQ 0 AND 1 
0002- 1030 FLAG .EQ 2 
1050 *# PUT NEXT NYBBLE AT (PNTR) 
1060 IF FLAG = $55, PUT LEFT NYBBLE 
1070 : = $AA; PUT RIGHT NYBBLE 
1090 PUT.NEXT.NYBBLE 
0800- A200 +1100 LDX #0 
0802- 46 02 =: 1110 LSR FLAG $55 OR $AA 
O804- BO 07. ~=—- 1120 BCS .1 ...IT WAS $AA, NOW $54 
1130 #---STORE IN LEFT NYBBLE~----—--- 
0806- OA 1740 ASL FLAG NOW $AA 
0807- OA 1150 
O808- OA 1160 ASL 
OB Oke Bt oo | abo SrA (PNTR,X) 
O80C- 60 1190 RTS : 
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1200 *---STORE IN RIGHT NYBBLE-------- 
O80D- 01 00 1210 .1 ORA (PNTR,X) MERGE WITH LEFT NYBBLE 
O80F- 81 00 1220 STA (PNTR,X 
0813- £6 00 1380 INC PNTR © MOVE PAIR TO NEX? 
= MOVE PNTR TO NEXT BY 
0815= DO 02 Ure BNE .2 cee 
0817- E6 01 1260 INC PNTR+1 
0819- 60 ie 22 RTS 
1280 Benen ee 
1290 # GET NEXT NYBBLE 
1390 sd IF FLAG = 32 GET LEFT NYBBLE 
: a3 : = $AA, GET RIGHT NYBBLE 
1330 GET. NEXT .NYBBLE 
O81A= A2 00 13 0 LDX #0 
081C- 46 02 1350 LSR FLAG WAS $55 OR $AA 
O81E- A1 00 1360 LDA (PNTR,X) GET BYTE WITH NYBBLES 
0820- BO 05 iho BCS .1 eoeWAS $AA, NOW $54 
1380 *---GET LEFT NYBBLE-------------~- 
0822- 4A 1390 LSR 
0823- 4A 1400 LSR 
O824- 4A 1410 LSR 
O825- 4A 1420 LSR 
0826- 60 ats RTS 
1440 #---GET RIGHT NYBBLE-------------- 
Ob2- £6 00 eo | «ING PEER Avante ToMTC, #8 
O82B- DO 02 rie BNE .2 on re ee 
O8or- 9 OF «1490.2 AND SOR 
- . D #$0F ISOLATE NYBBLE 
0831- 60 1200 ‘ RTS 


Grappler Interfaces 


There should be a leaflet included with this issue describing 
the Grappler printer interfaces. We now have three of them "in 
the family“ here, and have been very pleased with their 
performance. Check the brochure for features, the ad on page 
three for our prices, and let us hear from you. 


WICO Track Ball 


Several of you have inquired about or ordered the WICO Track 
Ball that I reviewed a couple of months ago, so we've decided 
to carry them regularly. WICO has since raised their price 
from $79.95 to $89.95, so we're going from $75 to $80. 


Diskettes 


There's getting to be a lot more competition in the diskette 
business, so prices are falling. After seeing so many ads at 
such attractive prices, Bob called Verbatim and told them that 
we had to have a better price, or we would have to change 
brands. That paid off, so we can now offer the same high- 
quality Verbatim Datalife diskettes at $45.00 for a package of 
20. That's $2.25 each for the best diskettes we've found. 


Whatever You Want 
If you're shopping for a new peripheral, accessory, or program, 


give us a call and ask for a quote. We can get nearly anything 
you might want, and we'd love the chance to serve you. 
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Some Small PACCNCS 5 wdd-8 Sa: } SEs HS SS OR eewre eee Bot Morgan 


We've had several calls requesting the patch addresses for a 
couple of features in the S-C Macro Assemblers. 


Ansert? 


In Version 1.1 of the Macro Assembler, Bob changed the CTRL-I 
(Insert) command in the EDIT mode to CTRL-A (for ADD). This 
was done because the Apple //e keyboard has the TAB key, which 
generates a CTRL-I code. It didn't seem to make much sense to 
have the TAB key do an insert operation, so he added a clear- 
to-next-tab-stop function for CTRL-I. 


Well, a lot of people don't have //e's, or don't much care 
about the TAB key. A lot of us are used to CTRL-I for Insert, 


and would like to keep it that way. 


The CTRL-A character ($81) is at $1C87 in the $1000 version, 
and at SDCB7 in the $D000 version. Just change that byte to a 
$89, and you'll have your good old CTRL-I back. If you want to 
keep the clear-to-tab-stop function, you can change the $89 at 
S$1CC6 ($DCC6) to a $81. That will make CTRL-A do the clear-to- 
tab. 


~-BS Filler Byte 


The directive .BS <expr> skips over <expr> bytes when you are 
assembling to memory, and sends <expr> zero bytes to the target 
file when you are assembling to disk. Several people have 
asked how to change the zero to some other value. 


For example, a freshly~-erased EPROM contains all SFF bytes. 
When you burn data into the chip, you actually write in just 
the zero bits. If you are assembling code to be written into 
an EPROM, you want any fill bytes to be SFF, so you can add 
eels later without having to erase and re-write the whole 
chip. 


The following table shows the addresses of the zero byte in the 
various versions of the Macro Assembler. Just change the 
indicated byte to the value you want to use for filler. 


| 1 el 

| 40-col //e Videx STB 
$1000 2D43 | 2D62 2D48 2E37 2E60 
$D000 EE8F | EE86 EE62 EF5A EF83 


Version 1.0 
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Some More 68000 Boards 


First let me apologize for an erroneous statement in the May 
‘83 issue, in which I juxtaposed two unrelated facts ina 


cause-effect sentence. 


Many readers have sent corrections: I 


am told that grounding the DTACK signal has nothing to do with 


how much memory you can add. 
it did? 


How did I ever get the idea that 
If you want the straight scoop on this, subscribe to 


Digital Acoustics' newsletter "“DTACK Grounded", 


Digital Acoustics has announced a new board, called the "DTACK 


Grande", 
isn't. 


Almost sounds like “grounded”, but this time it 
You get one megabyte of RAM and a 12.5 MHz 68000. RAM 


refresh is handled by an interrupt routine, with software. The 
overhead is only 4%, giving an effective speed of 10 MHz. 
Expansion connectors on the card can connect to another 15.7 


megabytes. 
Hardenburg beat me to it! 


I'd say Saybrook has been passed by, but Hal 
(Digital Acoustics, 1415 E. 
McFadden, Suite F, Santa Ana, CA 92705. 


(714) 835-4884) 


Mike Heckman at Anthro-Digital sent me some literature on 


another new 68000 board. 
calls it the “PDQ//". 


deal on one of these. 
01202. (413) 445-4219) 


Enhancement Technology Corporation 
Specs include: 
p-system, Applesoft-compatible BASIC. 
available by the end of August. 
(ETC, P.O.Box 1267, Pittsfield, MA 


10 MHZ, 256K RAM, UCSD 
The price will be $1495, 
We may be able to make you a 


ES-CAPE will set your creativity free! 


ES-CAPE will help you develop, enter, and modify 
Applesoft programs. Even if you are only copying a 
program from a magazine, ES-CAPE will help you do it 
three times faster! 


Visualize this: by pressing just a key or two, you can... 
¢ See the disk catalog, select a program, and load it into 
memory. 
Browse through the program a screen or a line at a 
time. 
Edit lines using powerful commands like the word 
processors have: insert, delete, truncate, overtype, 


scan to beginning or end or to a particular character, 
and more. 
See the values of the variables used by your Apple- 
soft program as it ran. 

¢ Save the modified program. ES-CAPE remembers the 
file name for you! 


ES-CAPE is easy to learn and use! 

¢ Well-written User Manual guides you through the 
learning process. 

¢ Handy Quick Reference Card reminds you of all fea- 
tures and commands. 

¢ Built-in help screens and menus refresh your mem- 
ory. You don't have to memorize anything! 

¢ The disk is NOT protected! You can put ES-CAPE on 
every disk you own, and make as many backup copie 
as you need. 


ES-CAPE will speed up and simplify your Applesoft 

programming! 

¢ Choose a starting value and step size for automatic 
line numbering. 

¢ Swiftly find all references to a given variable, line 
number, or any other sequence of characters. 
Quickly and automatically scan your program for any 
sequence of characters and replace them with a new 
spelling. 
Enter commonly used words or phrases with a single 
keystroke. A full set of pre-defined macros is pro- 
vided, which you may modify as you wish. 
Display a DOS Command Menu with a single key- 
stroke. A second keystroke selects CATALOG, 
LOAD, SAVE, and other common DOS commands. 
You can easily manage a disk-full of programs! 


ES-CAPE is available now at many fine computer 
stores, or directly from S-C Software Corporation. The 
price is only $60. 


S-C SOFTWARE CORPORATION 
2331 Gus Thomasson, Suite 125 
Dallas, TX 75228 (214) 324-2050 


Professional Apple Software Since 1978 
Viea, MasterCard, American Express, COO acc.pied. 
Apple 0 6 I'edemnaen of Apple Computer inc 
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Bringing Some Patches Together.....cccccccccceveseeetim Wetzel 


Earlier this year I decided to break down and finally buy an 
80-column card for my Apple II+. After all, it's cheaper than 
a IIe. I was just about to type in the Videx patches from AAL 
Volume 2, No.11, when Bob announced Version 1.1. Well with the 
Videx patches and all the new features I just couldn't pass up 
his offer. After a call to Bob and a three day wait I had 
version 1.1 of the S-C Macro Assembler. 


While testing out the new version I soon discovered most of the 
patches I had applied to version 1.0 would not work properly. 
The addresses of the routines/tables had all moved. After a 
few hours work and a lot of dis-assembling I would like to 
share the new locations with AAL readers and bring some of the 
patches together. 


First I will describe the new addresses and then show how I 
used them. 


The Escape Function Table is now located at $l14AB-$14C6 <ESC-@ 
thru ESC-M>. This is a group of two-byte addresses (minus l, 
because they are of the PHA-PHA-RTS variety) of the routines to 
handle the escape functions. 


The Edit Function Table is now located at $1CB4-S$1CE3 <ctr1-@ 
thru ctr1-xX>. This table is somewhat different. Each entry is 
three bytes long and it contains the control character and the 
address-minus-] of the routine to handle the function, 


Location $14D3 contains the dash count <$26> for the ESC-L 
function, 


Location $13FF contains a JSR to the monitor Bell routine. 

This is the end of the input checker, the JSR BELL is executed 
when an invalid character is entered, and a good place to put a 
JSR to an extended input processor. 


These locations are valid for the regular version and the Videx 
version which load at $1000. For language card users just aad 
$C000 to the address. My “at is off to Bob for adding all the 
features of Videx and still keeping the assembler looking the 
same. I have not checked the STB or the IIe versions for 
compatibility but, with a little bit of work and knowing what 
to look for it should be an easy process. 


Now, what can you do with this information? I have modified 
Bob's language card loader to show you (figure 1). With the 
exception of the REM statements, lines 1000-1140 of the file 
are as Bob supplied; after that the changes begin. I will not 
spend a lot of time explaining the routines themselves because 
they are all well documented in the referenced AAL articles. 


The first thing I do is load in my extended input processor 
(figure 2) at S$F600. There appears to be about two free pages 
after the assembler and before monitor in the language card 
version. For standard version users just move the symbo] table 
up as described AAL Vol. 2, No. 9. My input processor is a 
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Quick TRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last Instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until itis desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes fo the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
Information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. Its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE Is 
alive. 


QUICK TRACE is a beautiful way to show the 


incredibly complex sequence of operations that 
a computer goes through in executing a program 


Quick TRACE $50 


Is atrademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 
fine computer stores 


Anthro - Digital Software, Inc. 
P.O. Box 1385 Pittsfield, MA 01202 
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combination of Auto Catalog (AAL 2.9) and Toggling Upper/Lower 
Case (AAL 3.3). Next I modify the JSR BELL to JSR CONTROL.A. 


Once you have control you can add any routines you wish (such 
as R. F. O'Brien's Auto/Manual Toggle AAL 2.11). For now I am 
only interested in an upper/lower case toggle. 


Line 1170 modifies the ESC-C function to JSR to my routine for 
auto Catalog. Remember this should be the address of the 
routine - 1. Lines 1180-1190 change the cursor to a blinking 
underline (as described in AAL 3.5) along with line 1200 which 
changes the number of “-"“'s from 38 to 64 (I found 68 to be too 
many). 


Last but not least is an answer to Steve Mann's request for a 
upper/lower case toggle in EDIT mode. In version 1.1 Bob 
changed the ctrl-I key function in EDIT mode and added a ctr1l-A 
key function in its place. He did it so that the //e TAB key, 
which generates control-I, would really mean TAB. 


Well Bob, I like mnemonic commands (like ctrl-I for Insert), 
and think the older Apples should still take precedence. Line 
1210 changes the ctrl-A key to branch to my upper/lower case 
toggle routine, just past the character check, and line 1220 
changes the ctrl-I routine back to its proper function (this 
was the address found in the ctrl-A area). 


I hope these patches will be useful to other AAL readers not 
only for what they do, but for how they do it. 


1000 REM LOAD S-C MACRO ASSEMBLER (VIDEX) 

1010 REM INTO RAM AT $DO0O00 

1020 REM LOAD PATCHES AT SF600 

1030 REM PATCH INPUT TEST TO CHECK FOR MY COMMANDS BEFORE ERROR 
1040 REM PATCH ESCAPE TABLE (S$D4AB-) FOR ESCAPE-C 

1050 REM CHANGE CURSOR TO BLINKING UNDERLINE 

1060 REM PATCH ESC-L DASH LINE COUNT 

1070 REM PATCH EDIT CNTL-A TO MY ROUTINE 

1080 REM PATCH EDIT CNTL-I BACK TO INSERT FUNCTION 

1090 CALL-151 

1100 C081 C081 

1110 F800<F800.FFFFM 

1120 BLOAD S-C.ASM.MACRO.D000.VIDEX 

1130 300:A9 4C CD 00 EO FO 12 8D 00 EO A9 OO 8D O1 EO AY DO 
1140 300G 

1150 BLOAD SCM.PATCH 8D 02 EO AQ CB 8D D1 03 60 
1160 D3FF:20 00 F6 
1170 D4Bl1:19 F6 
1180 COBO:0A 68 
1190 COBO:0B 08 
1200 D4D3: 40 
1210 DCB8:03 F6 
1220 DCC7:0B DC 
1230 C080 

1240 3D3G 
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S-C Macro Cross Assemblers 


The high cost of dedicated microprocessor development systems has 
forced many technical people to look for alternate methods to develop 
programs for the various popular microprocessors. Combining the 
versatile Apple II with the S-C Macro Assembler provides a cost 
effective and powerful development system. Hobbyists and engineers 
alike will find the friendly combination the easiest and best way to 
Nextend their skills to other microprocessors. 


The S-C Macro Cross Assemblers are all identical in operation to the 
S-C Macro Assembler; only the language assembled is different. They 
are sold aS upgrade packages to the S-C Macro Assembler. The S-C 
Macro Assembler, complete with 100-page reference manual, costs $80; 
once you have it, you may add as many Cross Assemblers as you wish at 
a nominal price. The following S-C Macro Cross Assembler versions are 
now available, or soon will be: 


Motorola: 6800/6801/6802 now $32.50 

6805 now $32.50 

6809 now $32.50 

68000 now $50.00 

Intel: 8048 now $32.50 

8051 now $32.50 

8085 now $32.50 

Zilog: Z-80 now $32.50 

RCA: 1802/1805 now $32.50 

Rockwell: 65C02 now $20.00 

DEC: PDP-11/LSI-11 now $50.00 
The S-C Macro Assembler family is well known for its ease-of-use and 
powerful features. Thousands of users in over 30 countries and in 
every type of industry attest to its speed, dependablility, and 
user-friendliness. There are 20 assembler directives to provide 


powerful macros, conditional assembly, and flexible data generation. 
INCLUDE and TARGET FILE capabilities allow source programs to be as 
large aS your disk space. The integrated, co-resident source program 
editor provides global search and replace, move, and edit. The EDIT 
command has 15 sub-commands combined with global selection. 


Each S-C Assembler diskette contains two complete ready-to-run 
assemblers: one is for execution in the mother-board RAM; the other 
executes in a 16K RAM Card. The HELLO program offers menu selection 
to load the version you desire. The disks may be copied uSing any 
standard Apple disk copy program, and copies of the assembler may be 
BSAVEd on your working disks. 


-C Software Corporation has frequently been commended for outstanding 


support: competent telephone help, a monthly (by subscription) 
newsletter, continuing enhancements, and excellent upgrade policies. 


S-C Software Corporation (214) 324-2050 
P.O. Box 280300, Dallas, Texas, 75228 
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1000 *SAVE WETZE “ PATCHES TO 1.1 
1010 -OR $F600 
1020 ~ITF SCM. PATCH 
Iaro Bee emer ee eee mw ewe ew mw ww wen een nn 
0024- 1040 CH ~EQ $24 
0028- 1050 BASL ~EQ $28 
OOk0- 1060 YSAVE .EQ $40 
0200- sone WBUF ~EQ $200 
C080- 1080 LCPROT .EQ $C080 LC Protect 
C08 3- 1090 LCWRT .EQ $C08 LC Write enable 
D0 16— 1100 UCFLAG .EQ $D01 UC/LC Flag 
FF3A- ie BELL EQ $FF3A Monitor Bell 
1130 CONTROL.A 
F600- C9 81 1140 CMP #$81 Was a CNTL=-A entered 
F602= DO 12 1150 BNE ERROR No - then signal error 
F604- AD 83 CO 1160 LDA LCWRT Write enable Language card 
F607=- AD 83 CO yt LDA LCWRT 
F60A- AD 16 DO 1180 LDA UCFLAG Get upper case flag 
F60D- 49 FF 1190 EOR #$FF Reverse it 
F60F- 8D Me DO 1200 STA UCFLAG Put it back 
F612= AD 80 CO 1210 LDA LCPROT Write protect Language card 
F615= 60 1220 
1eR5 ERROR 
F616= 20 3A FF 1240 JSR BELL Ring bell to signal error 
F619= 60 1250 RTS Return 
1260 Wesees cae eeccaree eee cnn anes teseeeecudesecesessnsoeeeceeee 
ba ESCAPE .C 
F61A- EO 00 1280 CPX #0 Start of line? 
F61C= DO 1C 1290 BNE .2 No, rtn 
F61E=- AO 00 1300 LDY #0 
F620- BY 3B F6 1310 «1 LDA MSG,Y Get message 
F623- 99 00 02 1320 STA WBUE Y Put in buffer 
F626- 91 2 1330 STA (BASL),Y Put on screen (40-column) 
F628- C8 1340 INY 
F629=- CO 07 1350 CPY #7 Finished ? 
F62B- DO F 1360 BNE .1 Not yet 
F62D—- 84 4 1 fo STY YSAVE 
F62F- C8 1380 INY 
F630— 84 24 1390 STY CH Tell assembler 
F632- BA 1400 TSX this was an 
F633=- AQ CC 1410 LDA #$CC ESC-L so it will 
F635— 9D 03 01 1420 STA $103,X exec command 
F638- AG 4 1430 LDX YSAVE 
F63A- 60 14 2 RTS 
F63B- C3 C1 D4 
F63E- C1 CC CF 
F641—= C7 1450 MSG eAS -/CATALOG/ 


"One more beep and you're out!" 


We have uncovered another neat new Apple accessory: a volume 
control for the speaker! If other people within earshot of 
your computer are trying to sleep, or just can't take another 
five minutes of bells, beeps, and buzzes, the WHISPER VOLUME 
CONTROL is for you. The Apple version works with II, II Plus, 
//e, ox ///. All you have to do to install it is take the case 
off your Apple, unplug the speaker wire from the board, plug in 
the WVC cable, and plug the speaker wire into the other end of 
the WVC connector. You can also get WVC for the IBM/PC. The 
retail price is $22.95 for the standard version, or $25.95 with 
a headphone jack, from Information Dynamics Corp., 1251 
Exchange Drive, Richardson, TX 75081. Phone (214)783-8090. Or 
if you like, buy them from us at $21 and $24, respectively. 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P.O. Box 
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